home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 090 / cmln0885.arc / FORTH2.TBL < prev    next >
Text File  |  1986-02-27  |  3KB  |  51 lines

  1.  
  2.  
  3.                             Table 2.
  4.                         Forth Benchmarks
  5.  
  6.                          SUB-    MULTI-  DIV-           
  7.                          TRACT.  PLY     IDE           COMPARE
  8.          LOOP     TEST     TEST     TEST     MOVE    TEST   Sieve1    Sieve2    Sieve3    Sieve4    Sieve5
  9.  
  10. IBM:
  11.  
  12. polyFORTH [1]     1.063     3.470     4.250     4.463     3.471     4.235    52.502    35.214    62.855    63.195    70.510
  13. F83         1.172     4.462     7.619    37.367     4.463     5.206    67.796    43.923    79.863    80.430    89.008
  14. MVP-FORTH     1.098     3.570     4.461     4.589     3.801     4.214    55.010     [2]    64.680    65.709    72.671
  15. TaskFORTH     0.893     3.553     4.338     5.691     3.471     4.233    55.147    35.202    64.597    65.986    73.130
  16. PC/Forth     0.779     3.400     4.265     4.621     3.223     3.991    52.209    33.419    62.078    64.608    71.573
  17. MasterFORTH     0.638     2.691     3.573     9.584     3.305     3.214    45.028    29.570    53.583    54.520    60.809
  18. NGS Forth     0.992     3.471     4.389     4.620     3.541     4.041    53.485    35.383    64.783    63.984    71.529
  19. ST-FORTH     0.850     3.470     4.303     5.130     3.471     4.049    54.754    34.498    64.808    64.511    71.953
  20. UNIFORTH     0.779     3.426     4.281     4.462     3.371     4.061    54.145    34.128    63.807    65.141    71.826
  21. HS/FORTH     1.204     3.284     4.134     4.594     3.636     4.131    47.818    33.841    53.530    56.934    61.522
  22. u4th [3]      -      -      -      -      -      -      -      -      -      -      -
  23.  
  24. MACINTOSH:
  25.  
  26. MasterForth      0.400   1.400   1.700    n/a    1.900   1.900  25.200  16.800  29.700  30.200  32.900 
  27. MacForth         0.700   2.100   5.100    n/a    2.900   2.500  34.400  21.300  41.400  45.900  50.900
  28.  
  29. [1] The MS DOS version of polyFORTH II Level 3 was benchmarked.  Stand-alone versions also exist.  
  30. [2] Running Sieve2 crashes MVP-FORTH.
  31. [3] Lacking a XENIX system for the IBM PC, u4th could not be tested or benchmarked.
  32.  
  33. ------------------------------------------------------------------------------------------------------
  34. Note to editor:  The following data is NOT for publication.
  35.  
  36.          LOOP     -TEST     *TEST     /TEST     MOVE     COMP    Sieve1    Sieve2    Sieve3    Sieve4    Sieve5
  37.  
  38. Personal Forth*     0.921     4.090     4.956     5.205     3.967     4.710    63.178    40.961    75.521    75.964    84.179
  39. TaskFORTH**     1.063     4.339     5.126     6.445     4.407     5.040    67.951    43.038    80.037    80.325    88.943
  40.  
  41. *Dysan's Personal Forth system.  Figures included for reference only - NOT for publication.
  42. **Also NOT for publication.  Same as previous TaskFORTH except does NEXT JMP instead of in-line next.
  43.  
  44. Note║  AlthougΦ al∞ thesσ system≤ claiφ t∩ follo≈ somσ FortΦ StandarΣ o≥ other¼ modification≤ t∩ thσ benchmarδ program≤ werσ necessar∙ iε almos⌠ ever∙ case¼ mostl∙ t∩ semi-ì
  45. standardizeΣ word≤ sucΦ a≤ 2DU╨ ¼ 2¬ ¼ etc«  Thσ filσ interfacσ varieΣ drastically«  Thσ benchmarδ routine≤ useΣ iε thi≤ revie≈ arσ essentiall∙ identica∞ witΦ thosσ useΣ iε ß ì
  46. recen⌠ articlσ iε [IT]BYT┼ magazinσ b∙ Erniσ Tell∩ ("Softwarσ Review║ polyFORT╚ anΣ PC/Forth"¼ Novembe≥ 1984¼ pp« 303-314)«  Thσ loop¼ subtract¼ multiply¼ divide¼ move¼ anΣ ì
  47. comparσ test≤ originall∙ appeareΣ iε [IT]"FORT╚ Dimensionsó (issuσ III/1¼ p« 11)«  Thσ variou≤ Eratosthene≤ Sievσ program≤ arσ derivative≤ oµ thσ Sievσ oµ Eratosthene≤ ì
  48. algorithφ appearinτ iε thσ Septembe≥ 198▒ [IT]BYTE¼ whicΦ Mr« Tell∩ selecteΣ fo≥ hi≤ review«  Al∞ time≤ arσ iε seconds«  Sieve▒ i≤ thσ basiπ Sievσ oµ Eratosthene≤ algorithm« ì
  49. Sieve▓ i≤ aε improveΣ Eratosthene≤ Sievσ b∙ Doε Colburn« Sieve│ i≤ aε Eratosthene≤ Sievσ describeΣ a≤ "optimized"« Sieve┤ i≤ ß Sievσ whicΦ make≤ usσ oµ ß CREAT┼ DOES╛ ì
  50. characte≥ array« Sieve╡ i≤ ß Sievσ describeΣ a≤ usinτ aε "optimizeΣ array."
  51.